home *** CD-ROM | disk | FTP | other *** search
/ Shareware Super Platinum 8 / Shareware Super Platinum 8.iso / mac / WIN_PRO / LB09D.ZIP;1 / STRTEST.BAS < prev    next >
Encoding:
BASIC Source File  |  1992-03-15  |  203 b   |  13 lines
  1.  
  2.  
  3.     ' Test the left$() and right$() functions
  4.  
  5.     test$ = "Here is my test string."
  6.  
  7.     for i = -5 to len(test$)
  8.  
  9.         print left$(test$, i)
  10.         print right$(test$, i)
  11.  
  12.     next i
  13.